(allocate_vectorlike): Add missing increment.

diff --git a/src/alloc.c b/src/alloc.c
index 1ae6cdd153ae0208ea2f95c01c60ee56361add75..c0da91bf61b4536b73241514db00eef395c01834 100644 (file)
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -860,7 +860,7 @@ allocate_vectorlike (len)
   consing_since_gc += (sizeof (struct Lisp_Vector)
                       + (len - 1) * sizeof (Lisp_Object));
   vector_cells_consed += len;
-  n_vectors;
+  n_vectors++;
 
   p->next = all_vectors;
   all_vectors = p;